#!/usr/bin/perl

use warnings;
use strict;
use lib 't/testlib';
use Test::More tests => 1;

use MyExport ':proto';

# not in eval { ... }, because that'd get checked during compile time, so we'd
# have no way of intercepting it.

eval "proto('ert','wert')"; 
ok($@ =~ /Too many arguments/i);
